www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminTemplates_qiye\D_chk2_reg_moban.asp
<%
'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************
%>
<htmL>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><LINK href="../css.css" type=text/css rel=stylesheet>
<%
dir_set="../../"
%>
<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->
<!--#include file=../../inc/ajaxLIB.asp-->
<!--#include file=../inc/checkadmin2.asp-->
<!--#include file=../../inc/functionFiless.asp-->
<!--#include file=../../inc/ND_class_function.asp-->
<script src="../../inc/admin.js" type="text/javascript"></script>
<%
AJAXshowLoader()
%>
<style type="text/css">
<!--
.STYLE1 {
color: #3300FF;
font-weight: bold;
}
-->
</style>
<div id="l_newm" style="filter:blendTrans(duration=1); width:734px; z-index:-1; border: 1px dashed #999999;left: 3px; top: 120px;">
<form action="D_chk_ok_reg_moban.asp" method="post">
<table width=732 border="1" cellpadding="0" cellspacing="0" bordercolor="#D9D9D9" bgcolor="#EBEBEB" style="border: 1px dashed #999999;">
<tr>
<td>
<%
nsssaf=0
set fileaw=new Cls_FSO
scrt_ff="../../templates/"&trim(request("mpath"))&"/"&iscrtfile
if fileaw.ReportFileStatus(server.mappath(scrt_ff))=-1 then
rssges="未"&"知"&"模板"
else
'fdatt=loadfile(scrt_ff)
if chk_bef_ver(scrt_ff,iscrtfile)=0 then
rssges="未"&"知"&"模板"
%>
<script language=javascript>
alert("此版本的模板无法在本系统上安装，详细信息:<%=errrstrra%>");
</script>
<br>
<br><br><br>
<center>此版本的模板无法在本系统上安装，详细信息:<%=errrstrra%></center>
<%
nsssaf=1
response.end
end if
if lcase(ReadXMLDocument(scrt_ff,"template_type_qiye_or_cms"))<>"qiye" then
%>
<script language=javascript>
alert("此模板为cms网站内容管理系统类模板，请进入本系统的cms网站内容管理子系统的后台再安装此模板");
</script>
<br>
<br><br><br>
<center>此模板为cms网站内容管理系统类模板，请进入本系统的cms网站内容管理子系统的后台再安装此模板</center>
<%
nsssaf=1
response.end
end if
if nsssaf=0 then
rssges=replace(ReadXMLDocument(scrt_ff,"template_name"),"'","")
end if
end if
%>
请输入模板名称:<input type="text" name="mbnmv" size="28" disabled="disabled" value="<%=rssges%>">
<input type="hidden" name="mbnm" value="<%=rssges%>"> <br>
请输入模板备注:
<textarea cols="40" rows="5" name="bzmb">
</textarea>
<input type="hidden" name="mpath" value="<%=request("mpath")%>">
<br>
<br>
<input type="submit" value="注册此模板">
</td>
</tr>
</table>
</form>
</div>
<br><br>
<script language=javascript>
AJAXfade(1,'l_newm');
</script>
<%
AJAXcloseLoader()
%>
</html>